home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 26 / AACD 26.iso / AACD / Programming / AntyDresiarz / AntyDresiarz4 / AD4 / Install < prev    next >
Encoding:
Text File  |  1998-04-27  |  13.3 KB  |  351 lines
  1. ; $VER Install-AntyDresiarz Issue #2 by Paplo/Taski (13.08.1997)
  2.  
  3.  
  4. ; Odpalenie efektów specjalnych Installera
  5. ;
  6. (run "RUN >NIL: InstallFX")
  7.  
  8. ; Wyôwietlenie planszy o pytanie o tryb instalacji
  9. ;
  10. (welcome)
  11.  
  12.  
  13. ; Wybór jëzyka instalacji
  14. ;
  15.      (set #JEZYK
  16.     (askchoice
  17.            (prompt "Wybierz jëzyk instalatora.\nSelect instalation language.")
  18.     (choices "Polski (Polish)" "English (Angielski)")
  19.     (help #askbool-help)
  20.     (default 0)
  21.      ))
  22.  
  23. ; -------------------------------- POLSKIE KOMUNIKATY --------------------------
  24.  
  25. (if (= #JEZYK "0")
  26.  
  27.     (
  28.  
  29.     (set #com_welcome "\n\n Grupa Taski ma zaszczyt powitaê Cië\nw instalatorze do czwartego wydania magazynu\nAntyDresiarz.\n")
  30.     (set #destdir_prompt "Wskaû katalog w którym chcesz zainstalowaê AntyDresiarza. Katalog 'AntyDresiarz4' zostanie automatycznie stworzony.")
  31.     (set #destdir_help   "Wybierz w oknie miejsce w którym chcesz zainstalowaê katalog z AntyDresiarzem.\n\nNie musisz tworzyê nowego katalogu dla AntyDresiarza, poniewaû katalog o nazwie 'AntyDresiarz4' zostanie automatycznie utworzony.")
  32.     (set #com_copyfiles "Kopiujë pliki...")
  33.  
  34.     (set #locale_prompt "\nCzy mam zainstalowaê katalogi locale oraz pliki akcentowe, które umoûliwiâ Ci wymowë artukuîów ?\n")
  35.     (set #locale_yes "Tak, instaluj")
  36.     (set #locale_no "Nie, nie instaluj")
  37.     (set #locale_help "Instalator zainstaluje angielskâ i polskâ wersjë katalogów locale. Umoûliwi Ci to komunikowanie sië z magazynem w jëzyku polskim lub angielskim.\n\nInstalator zainstaluje równieû specjalne pliki akcentowe, które umoûliwiâ Ci sîuchanie artykuîów wymawianych poprawnâ polszczyznâ.\n\nOdpowiednie pliki zostanâ skopiowane do katalogu LOCALE: Twojego dysku startowego.")
  38.  
  39.     (set #dbplayer_prompt   "Instalacja biblioteki \"dbplayer.library\", dziëki której posîuchasz wielokanaîowej muzyki podczas lektury magazynu.")
  40.     (set #dbplayer_exists   "UWAGA! UWAGA! UWAGA!\n\nNiepeîna wersja instalacyjna magazynu AntyDresiarz!\n\nBrak pliku \"Libs/dbplayer.library\"\n\nBez tej biblioteki magazyn nie bëdzie obsîugiwaî moduîów muzycznych w formacie DigiBooster Pro\n\nZdobâdú peînâ wersjë instalacyjnâ magazynu lub znajdú plik dbplayer.library i zainstaluj go rëcznie do katalogu LIBS:.")
  41.     (set #player61_prompt   "Instalacja biblioteki \"player61.library\", która umoûliwi Ci odsîuch moduîów w formacie The Player 6.1")
  42.     (set #player61_exists   "UWAGA! UWAGA! UWAGA!\n\nNiepeîna wersja instalacyjna magazynu AntyDresiarz!\n\nBrak pliku \"Libs/player61.library\"\n\nBez tej biblioteki magazyn nie bëdzie obsîugiwaî moduîów muzycznych w formacie The Player 6.x\n\nZdobâdú peînâ wersjë instalacyjnâ magazynu lub znajdú plik player61.library i zainstaluj go rëcznie do katalogu LIBS:.")
  43.     (set #boards_prompt     "Instalacja biblioteki \"boards.library\", która umoûliwi AntyDresiarzowi poprawne rozpoznanie Twojego sprzëtu.")
  44.     (set #boards_exists     "UWAGA! UWAGA! UWAGA!\n\nNiepeîna wersja instalacyjna magazynu AntyDresiarz!\n\nBrak pliku \"Libs/boards.library\"\n\nBez tej biblioteki magazyn nie bëdzie mógî dokonaê dokîadnego rozpoznania Twojego sprzëtu.\n\nZdobâdú peînâ wersjë instalacyjnâ magazynu lub znajdú plik player61.library i zainstaluj go rëcznie do katalogu LIBS:.\n\nBiblioteka ta nie jest wymagana do poprawnej pracy magazynu!")
  45.     (set #localelib_prompt  "Instalacja biblioteki \"locale.library\", dziëki której komunikacja z magazynem odbywaê sië bëdzie w wybranym jëzyku.")
  46.     (set #localelib_exists  "UWAGA! UWAGA! UWAGA!\n\nNiepeîna wersja instalacyjna magazynu AntyDresiarz!\n\nBrak pliku \"Libs/locale.library\"\n\nBez tej biblioteki magazyn nie bëdzie obsîugiwaî komunikatów w jëzyku angielskim\n\nZdobâdú peînâ wersjë instalacyjnâ magazynu lub znajdú plik locale.library na dysku z Workbenchem i zainstaluj go rëcznie do katalogu LIBS:.\n\nBiblioteka ta nie jest wymagana do poprawnej pracy magazynu!")
  47.     (set #reqtools_prompt   "Instalacja biblioteki \"reqtools.library\", dziëki której magazyn bëdzie mógî wyôwietlaê komunikaty.")
  48.     (set #reqtools_exists   "UWAGA! UWAGA! UWAGA!\n\nNiepeîna wersja instalacyjna magazynu AntyDresiarz!\n\nBrak pliku \"Libs/reqtools.library\"\n\nBez tej biblioteki magazyn nie bëdzie obsîugiwaî komunikatów ekranowych.\n\nZdobâdú peînâ wersjë instalacyjnâ magazynu lub znajdú plik reqtools.library i zainstaluj go rëcznie do katalogu LIBS:.\n\nBiblioteka ta jest WYMAGANA do uruchomienia magazynu!")
  49.     (set #stc_prompt        "Instalacja biblioteki \"stc.library\", dziëki której AntyDresiarz bëdzie mógî rozpakowaê pliki w formacie StoneCracker.")
  50.     (set #stc_exists        "UWAGA! UWAGA! UWAGA!\n\nNiepeîna wersja instalacyjna magazynu AntyDresiarz!\n\nBrak pliku \"Libs/stc.library\"\n\nBez tej biblioteki magazyn nie bëdzie potrafiî rozpakowaê danych spakowanych programem StoneCracker\n\nZdobâdú peînâ wersjë instalacyjnâ magazynu lub znajdú plik stc.library i zainstaluj go rëcznie do katalogu LIBS:.\n\nBiblioteka ta nie jest wymagana do poprawnej pracy magazynu.")
  51.     (set #xpkmaster_prompt  "Instalacja biblioteki \"xpkmaster.library\", dziëki której AntyDresiarz bëdzie mógî rozpakowaê pliki w formacie XPK")
  52.     (set #xpkmaster_exists  "UWAGA! UWAGA! UWAGA!\n\nNiepeîna wersja instalacyjna magazynu AntyDresiarz!\n\nBrak pliku \"Libs/xpkmaster.library\"\n\nBez tej biblioteki magazyn nie bëdzie obsîugiwaî danych spakowanych kompresorami XPK.\n\nZdobâdú peînâ wersjë instalacyjnâ magazynu lub znajdú plik xpkmaster.library i zainstaluj go rëcznie do katalogu LIBS:.\n\nBez tej biblioteki magazyn najprawdopodobniej odmówi posîuszeïstwa.")
  53.     (set #xpkSQSH_prompt    "Instalacja biblioteki \"xpkSQSH.library\", dziëki której AntyDresiarz bëdzie mógî rozpakowaê pliki w formacie XPK SQSH")
  54.     (set #xpkSQSH_exists    "UWAGA! UWAGA! UWAGA!\n\nNiepeîna wersja instalacyjna magazynu AntyDresiarz!\n\nBrak pliku \"Libs/Compressors/xpkSQSH.library\"\n\nBez tej biblioteki magazyn nie bëdzie obsîugiwaî danych spakowanych kompresorem XPK SQSH.\n\nZdobâdú peînâ wersjë instalacyjnâ magazynu lub znajdú plik xpkSQSH.library i zainstaluj go rëcznie do katalogu LIBS:Compressors.\n\nBez tej biblioteki magazyn najprawdopodobniej odmówi posîuszeïstwa.")
  55.     (set #translator_prompt "Instalacja biblioteki \"translator.library\", dziëki ktorej AntyDresiarz bëdzie mógî recytowaê artykuîy.")
  56.     (set #translator_exists "UWAGA! UWAGA! UWAGA!\n\nNiepeîna wersja instalacyjna magazynu AntyDresiarz!\n\nBrak pliku \"Libs/translator.library\"\n\nBez tej biblioteki magazyn nie bëdzie potrafiî wymówiê ani jednej litery.\n\nZdobâdú peînâ wersjë instalacyjnâ magazynu lub znajdú plik translator.library i zainstaluj go rëcznie do katalogu LIBS:.\n\nBiblioteka ta nie jest wymagana do odpalenia magazynu.")
  57.     (set #iffparse_prompt   "Instalacja biblioteki \"iffparse.library\", dziëki której AntyDresiarz bëdzie dziaîaî poprawnie.")
  58.     (set #iffparse_exists   "UWAGA! UWAGA! UWAGA!\n\nNiepeîna wersja instalacyjna magazynu AntyDresiarz!\n\nBrak pliku \"Libs/iffparse.library\"\n\nBez tej biblioteki magazyn nie uruchomi sië.\n\nZdobâdú peînâ wersjë instalacyjnâ magazynu lub znajdú plik iffparse.library i zainstaluj go rëcznie do katalogu LIBS:.\n\nBiblioteka ta jest WYMAGANA do odpalenia magazynu.")
  59.     (set #diskfont_prompt   "Instalacja biblioteki \"diskfont.library\", dziëki której na AntyDresiarz bëdzie mógî wyôwietlaê tekst.")
  60.     (set #diskfont_exists   "UWAGA! UWAGA! UWAGA!\n\nNiepeîna wersja instalacyjna magazynu AntyDresiarz!\n\nBrak pliku \"Libs/diskfont.library\"\n\nBez tej biblioteki magazyn nie uruchomi sië.\n\nZdobâdú peînâ wersjë instalacyjnâ magazynu lub znajdú plik diskfont.library na dysku z Workbenchem i zainstaluj go rëcznie do katalogu LIBS:.\n\nBiblioteka ta jest wymagana do odpalenia AntyDresiarza.")
  61.  
  62.     (set #end "\nWîaônie zakoïczono instalacjë.\n\nUruchom magazyn klikajâc na ikonce \"AntyDresiarz4\".\n\nW przypadku kîopotów z uruchomieniem magazynu zalecamy przeczytanie pliku readme, który znajduje sië w katalogu z wersjâ instalacyjnâ AntyDresiarza.\n\nGrupa Taski oraz AntyDresiarz Team ûyczy miîej lektury!")
  63.  
  64.     )
  65. )
  66.  
  67. (set #var_destdirname "AntyDresiarz4")
  68.  
  69. ;----------------------------------- Start!!!
  70.  
  71.  
  72. ; ============================= Wyôwietlenie strony powitalnej
  73. ;
  74.     (message #com_welcome)
  75.  
  76. ; ============================= Wyôwietlenie directory requestera
  77. ;
  78.     (set #var_selecteddir
  79.       (askdir
  80.         (prompt  #destdir_prompt)
  81.         (help    #destdir_help)
  82.         (default "RAM:")
  83.       )
  84.     )
  85.  
  86.     (set #var_destdir (tackon #var_selecteddir #var_destdirname))
  87.     (set @default-dest #var_destdir)
  88.  
  89. ; ============================= Tworzenie odpowiednich katalogów
  90. ;
  91.     (MAKEDIR #var_destdir (infos))
  92.     (MAKEDIR (tackon #var_destdir "FONTS"))
  93.  
  94. ; ============================= Kopiowanie plików
  95. ;
  96. ;    (WORKING #com_copyfiles)
  97.     (COPYFILES (SOURCE "FONTS") (DEST (tackon #var_destdir "FONTS")) (ALL) (NOGAUGE) )
  98.     (COPYFILES (SOURCE "AntyDresiarz.exe") (DEST #var_destdir) (NOGAUGE) )
  99.     (COPYFILES (SOURCE "AntydResiarz4.info") (DEST #var_destdir) (NOGAUGE) )
  100.     (COPYFILES (SOURCE "PREFS.PRE") (DEST #var_destdir) (NOGAUGE) )
  101.     (COPYFILES (SOURCE "DATA_FILE") (DEST #var_destdir) (NOGAUGE) )
  102.  
  103. ; ============================= Generowanie skryptu uruchamiajâcego
  104. ;
  105.     (textfile
  106.         (dest (cat #var_destdir "/AntyDresiarz4"))
  107.         (append "Assign FONTS: FONTS\n\nAntyDresiarz.exe\n\nAssign FONTS: Sys:FONTS")
  108.         (safe)
  109.     )
  110.  
  111. ; ============================= Instalowanie katalogów locale
  112.  
  113.     (set #var_locale
  114.         (askbool
  115.         (prompt  #locale_prompt)
  116.         (choices #locale_yes #locale_no)
  117.         (help    #locale_help)
  118.         (default 1)
  119.         )
  120.     )
  121.  
  122.     (if (= #var_locale 1)
  123.     (
  124.         (if (= (exists "LOCALE:Catalogs" (noreq)) 0)
  125.             (
  126.                 (MAKEDIR (tackon "LOCALE:" "Catalogs"))
  127.             )
  128.         )
  129.         (if (= (exists "LOCALE:Catalogs/polski" (noreq)) 0)
  130.             (
  131.                 (MAKEDIR (tackon "LOCALE:Catalogs" "polski"))
  132.             )
  133.         )
  134.         (if (= (exists "LOCALE:Catalogs/english" (noreq)) 0)
  135.             (
  136.                 (MAKEDIR (tackon "LOCALE:Catalogs" "english"))
  137.             )
  138.         )
  139.         (if (= (exists "LOCALE:Accents" (noreq)) 0)
  140.             (
  141.                 (MAKEDIR (tackon "LOCALE:" "Accents"))
  142.             )
  143.         )
  144.  
  145.         (COPYFILES (SOURCE "Catalogs/polski/AntyDresiarz.catalog") (DEST "LOCALE:Catalogs/polski") (NOGAUGE) )
  146.         (COPYFILES (SOURCE "Catalogs/english/AntyDresiarz.catalog") (DEST "LOCALE:Catalogs/english") (NOGAUGE) )
  147.         (COPYFILES (SOURCE "Accents") (DEST "LOCALE:Accents") (ALL) (NOGAUGE) )
  148.  
  149.     )
  150.     ) 
  151.  
  152. ; ============================= Instalacja biblioteki player61.library
  153. ;
  154.     (if (exists "Libs/player61.library")
  155.     (
  156.         (COPYLIB
  157.             (SOURCE "Libs/player61.library")
  158.             (DEST "LIBS:")
  159.             (PROMPT #player61_prompt)
  160.             (HELP @copylib-help)
  161.             (CONFIRM)
  162.         )
  163.     )
  164.     ;else
  165.     (
  166.         (message #player61_exists)
  167.     )
  168.     )
  169.  
  170. ; ============================= Instalacja biblioteki dbplayer.library
  171. ;
  172. ;    (COPYLIB
  173. ;        (SOURCE "Libs/dbplayer.library")
  174. ;        (DEST "LIBS:")
  175. ;        (PROMPT #dbplayer_prompt)
  176. ;        (HELP @copylib-help)
  177. ;        (CONFIRM)
  178. ;    )
  179.  
  180.     (if (exists "Libs/dbplayer.library")
  181.         (COPYFILES (SOURCE "Libs/dbplayer.library") (DEST "LIBS:") (NOGAUGE) )
  182.     )
  183. ; ============================= Instalacja biblioteki boards.library
  184. ;
  185.     (if (exists "Libs/boards.library")
  186.     (
  187.         (COPYLIB
  188.             (SOURCE "Libs/boards.library")
  189.             (DEST "LIBS:")
  190.             (PROMPT #boards_prompt)
  191.             (HELP @copylib-help)
  192.             (CONFIRM)
  193.         )
  194.     )
  195.     ;else
  196.     (
  197.         (message #boards_exists)
  198.     )
  199.     )
  200.  
  201. ; ============================= Instalacja biblioteki locale.library
  202. ;
  203.     (if (exists "Libs/locale.library")
  204.     (
  205.         (COPYLIB
  206.             (SOURCE "Libs/locale.library")
  207.             (DEST "LIBS:")
  208.             (PROMPT #localelib_prompt)
  209.             (HELP @copylib-help)
  210.             (CONFIRM)
  211.         )
  212.     )
  213.     ;else
  214.     (
  215.         (message #localelib_exists)
  216.     )
  217.     )
  218. ; ============================= Instalacja biblioteki stc.library
  219. ;
  220.     (if (exists "Libs/stc.library")
  221.     (
  222.         (COPYLIB
  223.             (SOURCE "Libs/stc.library")
  224.             (DEST "LIBS:")
  225.             (PROMPT #stc_prompt)
  226.             (HELP @copylib-help)
  227.             (CONFIRM)
  228.         )
  229.     )
  230.     ;else
  231.     (
  232.         (message #stc_exists)
  233.     )
  234.     )
  235. ; ============================= Instalacja biblioteki reqtools.library
  236. ;
  237.     (if (exists "Libs/reqtools.library")
  238.     (
  239.         (COPYLIB
  240.             (SOURCE "Libs/reqtools.library")
  241.             (DEST "LIBS:")
  242.             (PROMPT #reqtools_prompt)
  243.             (HELP @copylib-help)
  244.             (CONFIRM)
  245.         )
  246.     )
  247.     ;else
  248.     (
  249.         (message #reqtools_exists)
  250.     )
  251.     )
  252. ; ============================= Instalacja biblioteki translator.library
  253. ;
  254.     (if (exists "Libs/translator.library")
  255.     (
  256.         (COPYLIB
  257.             (SOURCE "Libs/translator.library")
  258.             (DEST "LIBS:")
  259.             (PROMPT #translator_prompt)
  260.             (HELP @copylib-help)
  261.             (CONFIRM)
  262.         )
  263.     )
  264.     ;else
  265.     (
  266.         (message #translator_exists)
  267.     )
  268.     )
  269. ; ============================= Instalacja biblioteki xpkmaster.library
  270. ;
  271.     (if (exists "Libs/xpkmaster.library")
  272.     (
  273.         (COPYLIB
  274.             (SOURCE "Libs/xpkmaster.library")
  275.             (DEST "LIBS:")
  276.             (PROMPT #xpkmaster_prompt)
  277.             (HELP @copylib-help)
  278.             (CONFIRM)
  279.         )
  280.     )
  281.     ;else
  282.     (
  283.         (message #xpkmaster_exists)
  284.     )
  285.     )
  286.  
  287.     (MAKEDIR "LIBS:Compressors")
  288.  
  289. ; ============================= Instalacja biblioteki xpkSQSH.library
  290. ;
  291.     (if (exists "Libs/compressors/xpkSQSH.library")
  292.     (
  293.         (COPYLIB
  294.             (SOURCE "Libs/compressors/xpkSQSH.library")
  295.             (DEST "LIBS:Compressors")
  296.             (PROMPT #xpkSQSH_prompt)
  297.             (HELP @copylib-help)
  298.             (CONFIRM)
  299.         )
  300.     )
  301.     ;else
  302.     (
  303.         (message #xpkSQSH_exists)
  304.     )
  305.     )
  306.  
  307.  
  308.  
  309. ; ============================= Instalacja biblioteki diskfont.library
  310. ;
  311.     (if (exists "Libs/diskfont.library")
  312.     (
  313.         (COPYLIB
  314.             (SOURCE "Libs/diskfont.library")
  315.             (DEST "LIBS:")
  316.             (PROMPT #diskfont_prompt)
  317.             (HELP @copylib-help)
  318.             (CONFIRM)
  319.         )
  320.     )
  321.     ;else
  322.     (
  323.         (message #diskfont_exists)
  324.     )
  325.     )
  326. ; ============================= Instalacja biblioteki iffparse.library
  327. ;
  328.     (if (exists "Libs/iffparse.library")
  329.     (
  330.         (COPYLIB
  331.             (SOURCE "Libs/iffparse.library")
  332.             (DEST "LIBS:")
  333.             (PROMPT #iffparse_prompt)
  334.             (HELP @copylib-help)
  335.             (CONFIRM)
  336.         )
  337.     )
  338.     ;else
  339.     (
  340.         (message #iffparse_exists)
  341.     )
  342.     )
  343.  
  344.  
  345. ; ------------- Koniec
  346.  
  347.  
  348. (message #end)
  349.  
  350. (exit)
  351.